﻿
Namespace LightSwitchApplication

    Public Class PaymentDetail

        Private Sub Advance_Compute(ByRef result As Decimal)
            ' Set result to the desired field value
            result = Me.OrderHeader.PaidAmount
        End Sub
    End Class

End Namespace
